﻿
Public Class window
    Private Const _name As String = "w"

    Public Shared Sub register(ByVal inlineScript As inlineScript)
        assert(Not inlineScript Is Nothing, "inlineScript is nothing.")
        var.invoke(inlineScript, _name, "window")
    End Sub

    Public Shared Function name(ByVal inlineScript As inlineScript, _
                                Optional ByRef actionTarget As String = Nothing) As String
        If Not inlineScript Is Nothing Then
            register(inlineScript)
        End If

        actionTarget += _name
        Return actionTarget
    End Function
End Class
